extern Lisp_Object Vminibuffer_list;
extern Lisp_Object get_minibuffer ();
-
-extern Lisp_Object Vlast_event_frame;
\f
DEFUN ("framep", Fframep, Sframep, 1, 1, 0,
"Return non-nil if OBJECT is a frame.\n\
f->has_minibuffer = mini_p;
f->focus_frame = Qnil;
f->explicit_name = 0;
- f->can_have_scrollbars = 0;
- f->has_vertical_scrollbars = 0;
+ f->can_have_scroll_bars = 0;
+ f->has_vertical_scroll_bars = 0;
f->param_alist = Qnil;
- f->scrollbars = Qnil;
- f->condemned_scrollbars = Qnil;
+ f->scroll_bars = Qnil;
+ f->condemned_scroll_bars = Qnil;
root_window = make_window ();
if (mini_p)
(select-window (frame-root-window (new-frame))) doesn't end up
with your typing being interpreted in the new frame instead of
the one you're actually typing in. */
- Vlast_event_frame = Qnil;
+ internal_last_event_frame = Qnil;
return frame;
}
{
FRAME_PTR f;
Lisp_Object lispy_dummy;
- enum scrollbar_part party_dummy;
+ enum scroll_bar_part party_dummy;
Lisp_Object x, y;
unsigned long long_dummy;
extern Lisp_Object this_command_keys;
extern int this_command_key_count;
+#ifdef MULTI_FRAME
+/* The frame in which the last input event occurred, or Qmacro if the
+ last event came from a macro. We use this to determine when to
+ generate switch-frame events. This may be cleared by functions
+ like Fselect_frame, to make sure that a switch-frame event is
+ generated by the next character. */
+Lisp_Object internal_last_event_frame;
+#endif
+
\f
/* Macros for dealing with lispy events. */
/* The values of Qevent_kind properties. */
extern Lisp_Object Qfunction_key, Qmouse_click, Qmouse_movement;
-extern Lisp_Object Qscrollbar_movement;
+extern Lisp_Object Qscroll_bar_movement;
/* Getting the kind of an event head. */
#define EVENT_HEAD_KIND(event_head) \